<!--#include file="inc/AspBox/Cls_AB.asp" -->
<%
AB.Use "jsLib"
Dim jsLib : Set jsLib = AB.jsLib.New
jsLib.Inc("extend.js")
Dim jso : Set jso = jsLib.Object
Dim str : str = ""

Dim text : text = "中文" '原字符串
Dim entext : entext = jso.chr2Unicode(text) '@return: 2D4E8765
Dim otext : otext = jso.unicode2Chr(entext) '@return: 中文

ab.c.printcn entext '@return: 2D4E8765
ab.c.printcn otext '@return: 中文
%>